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What is MILITRAN? Objects 


MILITRAN is a simulation-oriented, general purpose 
language developed by SYSTEMS RESEARCH 
GROUP, INC. under the sponsorship of the Office of 
Naval Research. The primary purposes of MILITRAN 
are: 

1. To facilitate the design of a simulation model to 
be implemented on a digital computer, 

2. To reduce the time and expense necessary to pro¬ 
gram the simulation model, and 

3. To assist in the extraction of meaningful results 
from the simulation. 

The structure of the MILITRAN language is grounded 
in a methodology common to all simulations and thus 
offers the analyst a natural vehicle for the expression 
of his model. This same language lends itself to straight¬ 
forward programming techniques without the need for 
elaborate circumlocutions. 

Every effort has been made to make the language 
natural from the point of view of both analyst and pro¬ 
grammer. For example, matrices and other arrays may 
be indexed explicitly on the name of an object; SPEED 
(THRESHER) and SPEED(SEA WOLF) correctly 
specify the appropriate entries of the vector SPEED 
without the assignment of artificial numerical values to 
the submarines named. Arrays having up to ten dimen¬ 
sions are permitted, thus eliminating the need for artificial 
partitioning to meet language limitations. Names of 
parameters may be up to sixty characters long; for 
example, NUMBER OF SUBMARINES IN THE 
NORTH SEA is a perfectly valid parameter name, easily 
understood by both programmer and analyst. Cryptic 
abbreviations are no longer needed. This flexibility, built 
into the MILITRAN language, reduces the difficulties 
associated with analyst/programmer communication; the 
program follows naturally from the analyst’s model and 
the analyst can easily interpret and check the actual pro¬ 
gram statements. 

All of the general processing and computational fea¬ 
tures familiar to users of FORTRAN, JOVIAL, and 
other algorithmic languages are present in MILITRAN 
in addition to the special simulation features. Simulations 
often contain a great deal of straightforward computation 
and data handling, and to provide special features at the 
expense of general power would be robbing Peter to pay 
Paul. Some users have stated that they find MILITRAN, 
because of its great flexibility, ideal for non-simulation 
work involving purely computational programming. The 
primary purpose of MILITRAN’s general programming 
features remains, however, the reduction of effort re¬ 
quired to program simulations. The following pages are 
devoted to discussions of specific MILITRAN features. 
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In defining the elements of a simulation model, the 
analyst frequently finds it convenient to refer to abstract 
objects (submarines, missiles, passengers, telephone 
lines, etc.) as well as to purely numerical parameters. 
These objects may further be grouped into classes, asso¬ 
ciated with other objects, or have numerical character¬ 
istics describing them. A conventional programming 
language would either force the analyst to specify his 
model in an unnatural way or compel the programmer 
to develop a scheme of artificial numerical codes, flags, 
and indices. MILITRAN allows any natural system 
definition to be programmed directly. 

In addition to the usual numerical and logical vari¬ 
ables, the MILITRAN programmer may use PRO¬ 
GRAM OBJECT variables to manipulate abstract ob¬ 
jects. The two statements below are analogous: 

ATTACKER = SEA WOLF 
I = 5 

The first statement assigns the value “5” to the numerical 
variable “I” while the second assigns the value “SEA 
WOLF” to the PROGRAM OBJECT variable 
“ATTACKER.” PROGRAM OBJECT variables may 
be used with essentially the same freedom as numerical 
variables—they may be compared, used in logical con¬ 
ditions, placed in vectors and other arrays, used as sub¬ 
scripts or indices, formed into lists, etc. The MILITRAN 
statements below illustrate some of these operations. 

OBJECT PLYMOUTH(2), RAMBLER(3), CADILLAC(l), ROLLS(2) 

defines eight cars as basic objects in the system. 

CLASS (LUXURY) CONTAINS EACH*CADILLAC, EACH*ROLLS 

defines a class or group containing the one CADILLAC 
and the two ROLLS. The class is called LUXURY. 

PROGRAM OBJECT MY CAR 

defines MY CAR as a program object variable. 

MY CAR = RAMBLER(l) 

assigns the value “RAMBLER” to the program object 
variable, “MY CAR.” In particular, MY CAR is now 
the first of the three Ramblers defined above. 

IF (MY CAR . IN . LUXURY), HOME JAMES 

tests the current value of MY CAR. If that value is a 
member of the class LUXURY, control will transfer to 
the statement labelled “HOME JAMES.” 

Numerical values may be associated with either objects 
or classes. Given the definitions 

CLASS (ECONOMY) CONTAINS EACH*RAMBLER, EACH*PLYMOUTH 
CLASS (CAR) CONTAINS EACH*LUXURY, EACH*ECONOMY 
INTEGER HORSEPOWER (CAR), SPEED (CAR) 

we could immediately refer to the values of SPEED (MY 
CAR) and HORSEPOWER(MY CAR) without resort 
to artificial indexing schemes. 
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List Processing 


Events 


In the design of a simulation model it is often con¬ 
venient to think of groups of related data as entries in 
a list. For instance, the position, assigned target, and 
weapon load of an aircraft in flight might constitute an 
entry in a “strike” list. So many similar groupings occur 
in the average simulation model that list processing fea¬ 
tures are especially helpful in a simulation language. 

MILITRAN provides an extensive list processing 
capability. The statements provided for defining and 
processing lists are both flexible and powerful. Lists may 
be deflned by LIST statements. The number and types 
of items included in a single list entry is entirely pro¬ 
grammer-defined; numerical, logical, and program object 
information may be combined in any way within a list 
entry. List entries may be created by PLACE and 
PLACE ENTRY statements; modified by REPLACE 
and REPLACE ENTRY statements; located by the sys¬ 
tem functions MINIMUM INDEX and RANDOM 
INDEX; and destroyed by means of REMOVE and 
REMOVE ENTRY statements. The entry or entries to 
be modified or removed by a REMOVE or REPLACE 
may be specified by logical conditions of any complexity 
on any or all components. This permits complex updating 
processes to be accomplished by a single MILITRAN 
statement. 

The flexibility of MILITRAN list processing is best 
demonstrated by example: 

LIST OPERATING ( (VEHICLE, DESTINATION, PASSENGERS), CAR) 

PROGRAM OBJECT VEHICLE, DESTINATION 

INTEGER PASSENGERS 

The above statements define a list and indicate the nature 
of information stored in each component of its entries. 
The use of “CAR” as a dimension indicates that the 
maximum number of entries possible is the number of 
objects in the class “CAR.” 

Operations on the above list might include some of 
the following: 

PLACE (MY CAR, CHICAGO, 3) IN OPERATING 

records the status of a car carrying three passengers to 
Chicago. 

REPLACE (MY CAR) BY (*, NEW YORK, ♦-!) IN OPERATING 

updates the status of that car after dropping one passen¬ 
ger. 

REPLACE (, , ♦ . L . 6) BY (♦ , * , * + 1) IN OPERATING 

adds one passenger to every car in the list which is now 
carrying less than six passengers. 

REMOVE (, LOS ANGELES) FROM OPERATING 

causes every entry whose DESTINATION is “LOS 
ANGELES” to be removed from the list. 

REPLACE ( ) BY (* , WASHINGTON , *) IN OPERATING 

resets the DESTINATION component of every entry to 
the value “WASHINGTON.” 




The central dynamic feature of most simulation pro¬ 
grams is the processing of simulated events occurring 
either at regular intervals or at critical points in time. 
MILITRAN provides a convenient and flexible means 
of implementing both “time-step” and “critical point” 
algorithms. Full control of event structure is retained by 
the user, and automatic features may be overridden with¬ 
out system alterations. 

The basic defining statement in a MILITRAN event 
is the EVENT statement. For example, 

CONTINGENT EVENT ARRIVE ( (ARRIVAL TIME, ARRIVING CAR), 8) 

defines the beginning of a block of statements which 
perform the processing associated with the arrival of cars 
at a given point. In addition, the same statement defines 
a list of parameters which distinguish one occurrence of 
the event from another. An END statement defines the 
end of the event processing block. Any number of events 
may be included in the program, and the processing asso¬ 
ciated with each event may take any form. At each 
occurrence of the event, the system clock (TIME) is 
automatically updated. Similarly, the entry containing 
parameters relating to the particular occurrence is located 
by the system variable INDEX. These automatic up¬ 
dating processes are triggered by the NEXT EVENT 
statement. 

The selection of events in their proper simulated order 
is accomplished as follows: 

1. By convention, the first component of each entry 
in an event list is considered to be the time at which 
the event will occur. 

2. Upon execution of the NEXT EVENT statement, 
all event lists are examined to find the entry having 
the smallest time component greater than or equal 
to TIME. 

3. TIME is set to the value of the chosen entry’s time 
component; INDEX is set to the position of that 
entry within its list. 

4. Control is transferred to the statement block asso¬ 
ciated with the list containing the chosen entry. 

Several implications arise directly from this convention. 
First, every entry in every event list represents the poten¬ 
tial occurrence of an event. Events may be scheduled or 
cancelled by means of simple list processing statements. 
Any event may cause or inhibit any other event by this 
means. Since the selection process is initiated specifically 
by the NEXT EVENT statement, several events may 
share blocks of coding. An unconditional transfer of 
control from one event to another does not violate system 
rules. The system clock (TIME) may be altered by the 
user if that is desired, and no disruption of the automatic 
event sequencing will result. Additional degrees of free¬ 
dom are provided by the PERMANENT EVENT state¬ 
ment anil modified NEXT EVENT statements. These 
permit planned variations in the “natural” event se¬ 
quence. 
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General Features 

Although much of the processing involved in a simula¬ 
tion program appears similar to that used in strictly 
computational codes, significant differences of a general 
nature occur. These differences must be considered in 
designing a simulation language, and have been an inte¬ 
gral factor in the development of MILITRAN. We have 
already mentioned several general features: sixty-char¬ 
acter identifiers, ten-dimensional arrays, and the use of 
objects as subscripts. Each of these features contributes 
heavily to the elimination of artificial coding “tricks” and 
to increased communication between programmer and 
analyst. 

The iterative processes in a simulation program often 
involve incrementation and termination criteria which ^ 
cannot be expressed in the usual algorithmic language. ^ 
The MILITRAN DO-loop form allows modification of ^ 
termination criteria, increment values, and even the index 
Itself within the iteration. Further, exit from the loop may 
be made at any point without loss of current values, and 
indices are defined even after normal exits. A second 
form of the DO statement permits iteration over all mem¬ 
bers of a class to be specified in a convenient and concise 
manner. Both forms of DO-loop may be nested to anv 
depth. ^ 

Several MILITRAN features reduce considerably the 
need for recompilation of a program: full diagnostics are 
produced by a single compiler run; the processor accepts 
mixed-mode expressions wherever contextual meaning 
is clear, thus eliminating recompilation due to missing 
(and unnecessary) decimal points; allocation of storage 
at running time eliminates recompilation for adjustment 
of dimensions. 

MILITRAN provides extensive cross-referenced com¬ 
piler listings, and further aids self-documentation efforts 
by permitting comments at any point. . . even within a 
statement. 


Further Information 

Three MILITRAN manuals are available to qualified 
requesters through the Defense Documentation Center 
(DDC), and are offered for sale through the Clearing¬ 
house for Federal Scientific and Technical Information 
(CFSTp, Springfield, Virginia 22151. The manuals and 
their prices from CFSTI are: 

1. MILITRAN Reference Manual (AD 601-794') 
$2.25 

2. MILITRAN Operations Manual for IBM 7090/ 
94 (AD 601-795), $2.00 

3. MILITRAN Programming Manual (AD 601- 
796), $3.50 

Other inquiries concerning MILITRAN should be 
directed to the Special Projects Department, 

SYSTEMS RESEARCH GROUP, INC. 

1501 Franklin Avenue 
Mineola, N. Y. 11501 



MILITRAN Statements 

Environment Declarations _ 

REAL ni(ii, i2 »• • •»ife)* • * *» 12 * • • •»ij) ^ 

INTEGER ni(ii, L.ik). • • •, L, • • •, ij) 

LOGICAL m (ii, i2,..., ik) * • • •. 12 , • • •, ij) 

OBJECT ni(ii),n 2 (i 2 ),---,n„(im) . . 

PROGRAM OBJECT ni(ii, b, • • •, ik), • • • > 12, • • •, >j) 

CLASS (c) CONTAINS ai, a2,..., a„ 

NORMAL MODE mi(ai,a 2 ,... ,ak),m 2 (bi,b 2 ,... ,b,) 

VECTOR N ( (ai,a2,...,a,),di,d2,. ..,d,) 

COMMON m, 112,..., Hj 

Substitution Statement 
a = b 

Control Statements 
GO TOs 
PAUSE j 
STOP 

IF (b),s^,s, 

UNLESS (b),s„St 
DO (s) UNTIL b, n = ei,e2 
DO (s) FOR a.IN.b 
CONTINUE 

List Processing Statements 
LIST n( (ci,C2,...,Ci),d) 

LENGTH (n) 

RESET LENGTH (n) to p 

PLACE (ei,e2.Cj) IN n 

REMOVE ENTRY n(k) 

PLACE ENTRY m(j) IN n 

REPLACE ENTRY n(k) BY (ei,e2,... ,e,) 

REPLACE ENTRY n(k) BY ENTRY m(i) 

REMOVE (bi, b2,..., bi) FROM n 

REPLACE (bi, b2,..., bj) BY (ei, ..Cj) IN n 

REPLACE (bi,b2,...,bi) BY ENTRY m(j) IN n 
MINIMUM INDEX (n(bi, b2,..., b„ b,^), s) 

RANDOM INDEX (n(bi, b2,..., bj, b,,), s) 

Event Statements 

PERMANENT EVENT n( (ai, a2,..., a^), d) 
CONTINGENT EVENT n( (ai, a2,..., aj), d) 

NEXT EVENT 

NEXT EVENT (m, n2,..., nj) 

NEXT EVENT EXCEPT (m, 112,..., nj) 

END 

END CONTINGENT EVENTS (s) 

Procedure Statements 
PROCEDURE n 

PROCEDURE n(ai, ..a„) 

EXECUTE n 

EXECUTE n (ai, a2,..., a„) 

RETURN 
RETURN a 

Input-Output Statements 

FORMAT (Format Specification) 

READ (t,s) List 
WRITE (t, s) List 
READWRITE (ti, Si, t2, S2) List 
BINARY READ (t) List 
BINARY WRITE (t) List 
END FILE RETURN (s) 

END RECORD RETURN (s) 

BACKSPACE (t) 

BACKSPACE FILE (t) 

END FILE (t) 

REWIND (t)_ 

UNLOAD (t) 
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MILITRAN CODING FORM 
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MILITRAN Features 

Event Processing 

• Programmed alteration of natural event sequence 
can be specified at any time. 

• Permits any timing convention without system mod¬ 
ification. 

• Attacker, target and critical parameters located 
automatically. 

Object/Class Definition 

• Unlimited association of objects within a class 
structure. 

• Automatic association of data with objects. 

• Free manipulation of object identifiers as variables. 

• Input/output of object identifiers. 

List Processing 

• List structure permits several components to be 
associated directly. 

• A list may be processed as a whole; list entries may 
be accessed with or without reference to objects. 

• Full capability to place, remove, replace, or modify 
list entries; entry selection by position or any set 
of logical conditions on any or all components. 

Arrays 

• Number of dimensions in an array limited only by 
storage capacity. Ten-dimensional arrays are en¬ 
tirely possible. 

• Dimensions may be expressions involving parame¬ 
ters to be supplied at load-time. 

• Subscripts may take the form of any expression 
and may be nested to any depth. 

General 

• Identifiers may be up to 60-characters in length. 

• DO-loops are controlled by logical expressions; 
indices may be altered within the loop; transfers 
to and from loops are not restricted. 

• Debugging time is reduced to a minimum by a full 
set of diagnostics and a complete cross-reference 
system. 

• All levels of diagnostics are issued in a single com¬ 
piler fun. 
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